home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #2 / Monster Media No. 2 (Monster Media)(1994).ISO / prog_gen / gcoope10.zip / GENTEST.C < prev    next >
Text File  |  1994-07-23  |  379b  |  37 lines
  1. /*
  2.  
  3.     Test file for GCOOPE Version 1.0 by Brian Lee Price
  4.  
  5.     Released as Public Domain   July, 1994.
  6.  
  7. */
  8.  
  9. #include "gcoope10.h"
  10.  
  11. #include <stdio.h>
  12. #include <stdlib.h>
  13.  
  14.  
  15.  
  16.  
  17.  
  18.  
  19.  
  20.  
  21.  
  22. void main (void)
  23. {
  24. object msg1;
  25. object Stdio;
  26.  
  27. if(gcInit()) abort();
  28.  
  29. msg1=g(New)(String,"Hello World!\n");
  30.  
  31. Stdio=g(New)(StdStream,stdout);
  32.  
  33. g(Puts)(Stdio,msg1);
  34.  
  35. }
  36.  
  37.